i=i+20
if i>360
   i=0
endif
ScanRadar(i)

;-------------------------------
if bulletbonus<>0 
  if bul_b%=0  
   bul_b%=bulletbonus 
  endif
endif
;-------------------------------
if rocketbonus<>0
  if roc_b%=0  
   roc_b%=rocketbonus 
  endif
endif
;-------------------------------
if RepairBonus<>0
  if Rep_b%=0  
   Rep_b%=RepairBonus 
  endif
endif

;-------------------------------
if bullets<10                         ;     
if bul_b%<>0                       ;     
  TurnCorpus=deltayaw(corpus%,bul_b%) ;    
endif
endif
;-------------------------------
if rockets=0                          ;      
if roc_b%<>0                       
  TurnCorpus=deltayaw(corpus%,roc_b%) 
endif
endif
;-------------------------------
if Mylives<5                          ;     
if Rep_b%<>0                       
  TurnCorpus=deltayaw(corpus%,Rep_b%) 
endif
endif


if enemy<>0     ;                               
  if target%=0  ;      0
   target%=enemy   ;    
  endif
endif

if target<>0                         ; 
  dist_t=EntityDistance(corpus%,target) ; 
  ppr=dist_t#/800                       ;
   turnturret=deltayaw(turret,target)   
   if abs(turnturret)<10                ; 
     turngun=deltapitch(gun,target)-ppr ;
     if abs(turngun)<2                  ; 
       fire1=1                          ;
     endif
   endif

   if rockets>0                          ; 
     if dist_t>500                       ; 
      TurnCorpus=deltayaw(corpus%,target);
     endif
   endif

   if dist_t<600                         ;
     fire2=1                             ; 
   endif
endif

ScanRadar(corpusyaw)              ;  corpusyaw         
 if (Obstacle>0) and (Obstacle<400); Obstacle    ,   
     Turn_C=20                     ;        40 ,   
      oba=ObsAngle                 ;   oba       
   endif
;---------------------- 
if Turn_C>0         ;    0
   Turn_C=Turn_C-1  ;  
   TurnCorpus=oba   ;         
endif

move=1  ;  
;---------------------------------
if CollidedObstacle%<>0
 if (turn_b1=0)and(turn_b2=0)
  turn_b1=60
 endif
endif

if turn_b1>0
   turn_b1=turn_b1-1
   if turn_b1=0
      turn_b2=50
   endif
move=-1
  if turn_b1<40
   TurnCorpus=-1
  endif
endif

if turn_b2>0
   turn_b2=turn_b2-1
   move=1
   TurnCorpus=1
endif
;================================

